home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Controls / Visual Basic Controls.iso / vbcontrol / ahmsyscm / _setup.1 / AHMTLogFile.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  1998-11-12  |  2.1 KB  |  64 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'AHMTLogFile.pas' rev: 3.00
  6.  
  7. #ifndef AHMTLogFileHPP
  8. #define AHMTLogFileHPP
  9. #include <AHMSystem.hpp>
  10. #include <Classes.hpp>
  11. #include <Messages.hpp>
  12. #include <Windows.hpp>
  13. #include <SysUtils.hpp>
  14. #include <SysInit.hpp>
  15. #include <System.hpp>
  16.  
  17. //-- user supplied -----------------------------------------------------------
  18.  
  19. namespace Ahmtlogfile
  20. {
  21. //-- type declarations -------------------------------------------------------
  22. class DELPHICLASS TAHMLogFile;
  23. class PASCALIMPLEMENTATION TAHMLogFile : public Ahmsystem::TAHMSystemsComponent 
  24. {
  25.     typedef Ahmsystem::TAHMSystemsComponent inherited;
  26.     
  27. private:
  28.     System::AnsiString FLogFile;
  29.     Classes::TNotifyEvent FOnClear;
  30.     bool FLogHeader;
  31.     bool FLogTime;
  32.     bool FLogDate;
  33.     bool FLogSpecial;
  34.     System::AnsiString FSpecial;
  35.     System::AnsiString FHeader;
  36.     
  37. public:
  38.     __fastcall virtual TAHMLogFile(Classes::TComponent* AOwner);
  39.     void __fastcall Log(System::AnsiString Logstr);
  40.     void __fastcall ClearLog(void);
  41.     
  42. __published:
  43.     __property System::AnsiString LogFile = {read=FLogFile, write=FLogFile};
  44.     __property System::AnsiString Header = {read=FHeader, write=FHeader};
  45.     __property bool LogTime = {read=FLogTime, write=FLogTime, default=0};
  46.     __property bool LogDate = {read=FLogDate, write=FLogDate, default=0};
  47.     __property bool LogSpecial = {read=FLogSpecial, write=FLogSpecial, default=0};
  48.     __property bool LogHeader = {read=FLogHeader, write=FLogHeader, default=0};
  49.     __property System::AnsiString Special = {read=FSpecial, write=FSpecial};
  50.     __property Classes::TNotifyEvent OnClear = {read=FOnClear, write=FOnClear};
  51. public:
  52.     /* TComponent.Destroy */ __fastcall virtual ~TAHMLogFile(void) { }
  53.     
  54. };
  55.  
  56. //-- var, const, procedure ---------------------------------------------------
  57.  
  58. }    /* namespace Ahmtlogfile */
  59. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  60. using namespace Ahmtlogfile;
  61. #endif
  62. //-- end unit ----------------------------------------------------------------
  63. #endif    // AHMTLogFile
  64.